inherited dtmxs_BackMaster: Tdtmxs_BackMaster
  OldCreateOrder = True
  Left = 405
  Top = 332
  Height = 414
  Width = 659
  inherited adsMaster: TADODataSet
    CursorType = ctStatic
    CommandText = 'Select * from V_xs_BackMaster where 0=1'
    object adsMasterBillID: TStringField
      DisplayLabel = #36864#36135#21333'ID'
      FieldName = 'BillID'
    end
    object adsMasterBillNo: TStringField
      DisplayLabel = #36864#36135#21333#21495
      FieldName = 'BillNo'
    end
    object adsMasterBillDate: TDateTimeField
      DisplayLabel = #36864#36135#26085#26399
      FieldName = 'BillDate'
    end
    object adsMasterBillType: TWordField
      DisplayLabel = #36864#36135#31867#22411
      FieldName = 'BillType'
    end
    object adsMasterPayDate: TDateTimeField
      DisplayLabel = #20184#27454#26085#26399
      FieldName = 'PayDate'
    end
    object adsMasterOrderNo: TStringField
      DisplayLabel = #35746#21333#32534#21495
      FieldName = 'OrderNo'
    end
    object adsMasterDeptID: TStringField
      DisplayLabel = #24215#38138'ID'
      FieldName = 'DeptID'
    end
    object adsMasterStockID: TStringField
      DisplayLabel = #20179#24211'ID'
      FieldName = 'StockID'
    end
    object adsMasterStockCode: TStringField
      DisplayLabel = #20179#24211#32534#30721
      FieldName = 'StockCode'
    end
    object adsMasterStockName: TStringField
      DisplayLabel = #25910#36135#20179#24211
      FieldName = 'StockName'
    end
    object adsMasterSigner: TStringField
      DisplayLabel = #31614#25910#20154
      FieldName = 'Signer'
    end
    object adsMasterCustID: TStringField
      DisplayLabel = #23458#25143'ID'
      FieldName = 'CustID'
    end
    object adsMasterCustCode: TStringField
      DisplayLabel = #23458#25143#32534#30721
      FieldName = 'CustCode'
    end
    object adsMasterCustShortName: TStringField
      DisplayLabel = #23458#25143#21517#31216
      FieldName = 'CustShortName'
    end
    object adsMasterSumMoney: TFloatField
      DisplayLabel = #24635#37329#39069
      FieldName = 'SumMoney'
    end
    object adsMasterHasCheck: TBooleanField
      DisplayLabel = #23457#26680#21542
      FieldName = 'HasCheck'
    end
    object adsMasterChecker: TStringField
      DisplayLabel = #23457#26680#20154
      FieldName = 'Checker'
    end
    object adsMasterCheckTime: TDateTimeField
      DisplayLabel = #23457#26680#26102#38388
      FieldName = 'CheckTime'
    end
    object adsMasterWriter: TStringField
      DisplayLabel = #39318#36755#20154
      FieldName = 'Writer'
    end
    object adsMasterWriteTime: TDateTimeField
      DisplayLabel = #39318#36755#26102#38388
      FieldName = 'WriteTime'
    end
    object adsMasterModifier: TStringField
      DisplayLabel = #20462#25913#20154
      FieldName = 'Modifier'
    end
    object adsMasterModifyTime: TDateTimeField
      DisplayLabel = #20462#25913#26102#38388
      FieldName = 'ModifyTime'
    end
    object adsMasterRemark: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'Remark'
      Size = 50
    end
  end
  inherited adsMasterEdit: TADODataSet
    CursorType = ctStatic
    CommandText = 'Select * from xs_BackMaster'
    object adsMasterEditBillID: TStringField
      DisplayLabel = #36864#36135#21333'ID'
      FieldName = 'BillID'
    end
    object adsMasterEditBillNo: TStringField
      DisplayLabel = #36864#36135#21333#21495
      FieldName = 'BillNo'
    end
    object adsMasterEditBillDate: TDateTimeField
      DisplayLabel = #36864#36135#26085#26399
      FieldName = 'BillDate'
    end
    object adsMasterEditBillType: TWordField
      DisplayLabel = #36864#36135#31867#22411
      FieldName = 'BillType'
    end
    object adsMasterEditPayDate: TDateTimeField
      DisplayLabel = #20184#27454#26085#26399
      FieldName = 'PayDate'
    end
    object adsMasterEditOrderNo: TStringField
      DisplayLabel = #35746#21333#32534#21495
      FieldName = 'OrderNo'
    end
    object adsMasterEditDeptID: TStringField
      DisplayLabel = #24215#38138'ID'
      FieldName = 'DeptID'
    end
    object adsMasterEditCustID: TStringField
      DisplayLabel = #23458#25143'ID'
      FieldName = 'CustID'
    end
    object adsMasterEditStockID: TStringField
      DisplayLabel = #20179#24211'ID'
      FieldName = 'StockID'
    end
    object adsMasterEditSigner: TStringField
      DisplayLabel = #31614#25910#20154
      FieldName = 'Signer'
    end
    object adsMasterEditSumMoney: TFloatField
      DisplayLabel = #24635#37329#39069
      FieldName = 'SumMoney'
    end
    object adsMasterEditHasCheck: TBooleanField
      DisplayLabel = #23457#26680#21542
      FieldName = 'HasCheck'
    end
    object adsMasterEditChecker: TStringField
      DisplayLabel = #23457#26680#20154
      FieldName = 'Checker'
    end
    object adsMasterEditCheckTime: TDateTimeField
      DisplayLabel = #23457#26680#26102#38388
      FieldName = 'CheckTime'
    end
    object adsMasterEditWriter: TStringField
      DisplayLabel = #39318#36755#20154
      FieldName = 'Writer'
    end
    object adsMasterEditWriteTime: TDateTimeField
      DisplayLabel = #39318#36755#26102#38388
      FieldName = 'WriteTime'
    end
    object adsMasterEditModifier: TStringField
      DisplayLabel = #20462#25913#20154
      FieldName = 'Modifier'
    end
    object adsMasterEditModifyTime: TDateTimeField
      DisplayLabel = #20462#25913#26102#38388
      FieldName = 'ModifyTime'
    end
    object adsMasterEditRemark: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'Remark'
      Size = 50
    end
    object adsMasterEditres_StockName: TStringField
      DisplayLabel = #25910#36135#20179#24211
      FieldKind = fkLookup
      FieldName = 'res_StockName'
      LookupDataSet = res_Stock
      LookupKeyFields = 'StockID'
      LookupResultField = 'StockName'
      KeyFields = 'StockID'
      Lookup = True
    end
    object adsMasterEditres_Barcode: TBooleanField
      DisplayLabel = #26465#24418#30721#31649#29702
      FieldKind = fkLookup
      FieldName = 'res_Barcode'
      LookupDataSet = res_Stock
      LookupKeyFields = 'StockID'
      LookupResultField = 'HasBarcode'
      KeyFields = 'StockID'
      Lookup = True
    end
    object adsMasterEditres_CustName: TStringField
      DisplayLabel = #23458#25143#21517#31216
      FieldKind = fkLookup
      FieldName = 'res_CustName'
      LookupDataSet = res_Customer
      LookupKeyFields = 'CustID'
      LookupResultField = 'CustShortName'
      KeyFields = 'CustID'
      Lookup = True
    end
    object adsMasterEditres_SignerName: TStringField
      DisplayLabel = #31614#25910#20154#21592
      FieldKind = fkLookup
      FieldName = 'res_SignerName'
      LookupDataSet = res_Employee
      LookupKeyFields = 'EmpID'
      LookupResultField = 'EmpName'
      KeyFields = 'Signer'
      Lookup = True
    end
  end
  object adsDetail: TADODataSet
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforePost = adsDetailBeforePost
    OnNewRecord = adsDetailNewRecord
    CommandText = 'Select * from xs_BackDetail where 0=1'
    EnableBCD = False
    Parameters = <>
    Left = 192
    Top = 40
    object adsDetailID: TStringField
      FieldName = 'ID'
    end
    object adsDetailBillID: TStringField
      DisplayLabel = #20851#32852'ID'
      FieldName = 'BillID'
    end
    object adsDetailOrderDetailNo: TStringField
      DisplayLabel = #35746#21333#26126#32454#21333#21495
      FieldName = 'OrderDetailNo'
    end
    object adsDetailPosNo: TStringField
      DisplayLabel = #20179#20301
      FieldName = 'PosNo'
      Size = 5
    end
    object adsDetailBoxNo: TStringField
      DisplayLabel = #31665#21495
      FieldName = 'BoxNo'
    end
    object adsDetailProductID: TStringField
      DisplayLabel = #20135#21697'ID'
      FieldName = 'ProductID'
    end
    object adsDetailProductCode: TStringField
      DisplayLabel = #20135#21697#32534#30721
      FieldName = 'ProductCode'
    end
    object adsDetailProductName: TStringField
      DisplayLabel = #20135#21697#21517#31216
      FieldName = 'ProductName'
      Size = 50
    end
    object adsDetailColorCode: TStringField
      DisplayLabel = #33394#21495
      FieldName = 'ColorCode'
    end
    object adsDetailColorName: TStringField
      DisplayLabel = #39068#33394
      FieldName = 'ColorName'
      Size = 30
    end
    object adsDetailPieceCount: TIntegerField
      DisplayLabel = #36864#36135#25968#37327'|'#20024#25968
      FieldName = 'PieceCount'
      OnChange = adsDetailPieceCountChange
    end
    object adsDetailPieceNumber: TFloatField
      DisplayLabel = #36864#36135#25968#37327'|'#27599#20024#25968#37327
      FieldName = 'PieceNumber'
      OnChange = adsDetailPieceNumberChange
    end
    object adsDetailNumber: TFloatField
      DisplayLabel = #36864#36135#25968#37327'|'#21512#35745#25968#37327
      FieldName = 'Number'
      OnChange = adsDetailNumberChange
    end
    object adsDetailUnitID: TWordField
      DisplayLabel = #36864#36135#25968#37327'|'#21333#20301'ID'
      FieldName = 'UnitID'
    end
    object adsDetailres_UnitName: TStringField
      DisplayLabel = #36864#36135#25968#37327'|'#21333#20301
      FieldKind = fkLookup
      FieldName = 'res_UnitName'
      LookupDataSet = res_Unit
      LookupKeyFields = 'UnitID'
      LookupResultField = 'UnitName'
      KeyFields = 'UnitID'
      Size = 10
      Lookup = True
    end
    object adsDetailPrice: TFloatField
      DisplayLabel = #23384#36135#21333#20215
      FieldName = 'Price'
      OnChange = adsDetailPriceChange
    end
    object adsDetailMoney: TBCDField
      DisplayLabel = #23384#36135#37329#39069
      FieldName = 'Money'
      OnChange = adsDetailMoneyChange
      Precision = 18
      Size = 2
    end
    object adsDetailSalePrice: TFloatField
      DisplayLabel = #38144#21806#21333#20215
      FieldName = 'SalePrice'
      OnChange = adsDetailSalePriceChange
    end
    object adsDetailSaleMoney: TFloatField
      DisplayLabel = #38144#21806#37329#39069
      FieldName = 'SaleMoney'
      OnChange = adsDetailSaleMoneyChange
    end
    object adsDetailFlowerHeight: TBCDField
      DisplayLabel = #33457#39640
      FieldName = 'FlowerHeight'
      Precision = 18
      Size = 2
    end
    object adsDetailFlowerWidth: TBCDField
      DisplayLabel = #33457#23485
      FieldName = 'FlowerWidth'
      Precision = 18
      Size = 2
    end
    object adsDetailFlowerBreadth: TBCDField
      DisplayLabel = #24133#23485
      FieldName = 'FlowerBreadth'
      Precision = 18
      Size = 2
    end
    object adsDetailFlowerGram: TBCDField
      DisplayLabel = #20811#37325
      FieldName = 'FlowerGram'
      Precision = 18
      Size = 2
    end
    object adsDetailWriter: TStringField
      DisplayLabel = #39318#36755#20154
      FieldName = 'Writer'
    end
    object adsDetailWriteTime: TDateTimeField
      DisplayLabel = #39318#36755#26102#38388
      FieldName = 'WriteTime'
    end
    object adsDetailModifier: TStringField
      DisplayLabel = #20462#25913#20154
      FieldName = 'Modifier'
    end
    object adsDetailModifyTime: TDateTimeField
      DisplayLabel = #20462#25913#26102#38388
      FieldName = 'ModifyTime'
    end
    object adsDetailRemark: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'Remark'
      Size = 500
    end
  end
  object res_Customer: TADODataSet
    Active = True
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 
      'Select CustID, CustCode, CustShortName, CustFullName from V_da_C' +
      'ustomer'
    Parameters = <>
    Left = 192
    Top = 104
  end
  object adsUserCompany: TADODataSet
    Connection = dtmConnect.conMain
    LockType = ltBatchOptimistic
    CommandText = 
      'select b.DeptID, b.DeptCode, b.DeptName from xt_CompanySet a '#13#10'j' +
      'oin da_Department b on a.CompanyID=b.DeptID'#13#10'where a.UserID=(sel' +
      'ect UserID from xt_Users where UserCode=:UserCode)'
    Parameters = <
      item
        Name = 'UserCode'
        Size = -1
        Value = Null
      end>
    Left = 464
    Top = 40
  end
  object res_Employee: TADODataSet
    Active = True
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 'Select EmpID, EmpName from V_da_Employee'
    Parameters = <>
    Left = 192
    Top = 176
  end
  object res_Stock: TADODataSet
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 'Select StockID, StockCode, StockName, HasBarcode from V_da_Stock'
    Parameters = <>
    Left = 328
    Top = 176
  end
  object adsBackType: TADODataSet
    Connection = dtmConnect.conMain
    LockType = ltBatchOptimistic
    CommandText = 'Select * from V_cg_BackType'
    Parameters = <>
    Left = 328
    Top = 104
  end
  object adsBrowseDetail: TADODataSet
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    BeforePost = adsDetailBeforePost
    OnNewRecord = adsDetailNewRecord
    CommandText = 'Select * from xs_BackDetail where 0=1'
    EnableBCD = False
    Parameters = <>
    Left = 328
    Top = 40
    object StringField1: TStringField
      FieldName = 'ID'
    end
    object StringField2: TStringField
      DisplayLabel = #20851#32852'ID'
      FieldName = 'BillID'
    end
    object StringField3: TStringField
      DisplayLabel = #35746#21333#26126#32454#21333#21495
      FieldName = 'OrderDetailNo'
    end
    object adsBrowseDetailPosNo: TStringField
      DisplayLabel = #20179#20301
      FieldName = 'PosNo'
      Size = 5
    end
    object adsBrowseDetailBoxNo: TStringField
      DisplayLabel = #31665#21495
      FieldName = 'BoxNo'
    end
    object StringField6: TStringField
      DisplayLabel = #20135#21697'ID'
      FieldName = 'ProductID'
    end
    object StringField7: TStringField
      DisplayLabel = #20135#21697#32534#30721
      FieldName = 'ProductCode'
    end
    object StringField8: TStringField
      DisplayLabel = #20135#21697#21517#31216
      FieldName = 'ProductName'
      Size = 50
    end
    object adsBrowseDetailColorCode: TStringField
      DisplayLabel = #33394#21495
      FieldName = 'ColorCode'
    end
    object adsBrowseDetailColorName: TStringField
      DisplayLabel = #39068#33394
      FieldName = 'ColorName'
      Size = 30
    end
    object adsBrowseDetailPieceCount: TIntegerField
      DisplayLabel = #36864#36135#25968#37327'|'#20024#25968
      FieldName = 'PieceCount'
    end
    object adsBrowseDetailPieceNumber: TFloatField
      DisplayLabel = #36864#36135#25968#37327'|'#27599#20024#25968#37327
      FieldName = 'PieceNumber'
    end
    object adsBrowseDetailNumber: TFloatField
      DisplayLabel = #36864#36135#25968#37327'|'#21512#35745#25968#37327
      FieldName = 'Number'
    end
    object adsBrowseDetailUnitID: TWordField
      DisplayLabel = #36864#36135#25968#37327'|'#21333#20301'ID'
      FieldName = 'UnitID'
    end
    object adsBrowseDetailres_UnitName: TStringField
      DisplayLabel = #36864#36135#25968#37327'|'#21333#20301
      FieldKind = fkLookup
      FieldName = 'res_UnitName'
      LookupDataSet = res_Unit
      LookupKeyFields = 'UnitID'
      LookupResultField = 'UnitName'
      KeyFields = 'UnitID'
      Size = 10
      Lookup = True
    end
    object adsBrowseDetailPrice: TFloatField
      DisplayLabel = #23384#36135#21333#20215
      FieldName = 'Price'
    end
    object BCDField3: TBCDField
      DisplayLabel = #23384#36135#37329#39069
      FieldName = 'Money'
      Precision = 18
      Size = 2
    end
    object adsBrowseDetailSalePrice: TFloatField
      DisplayLabel = #38144#21806#21333#20215
      FieldName = 'SalePrice'
    end
    object adsBrowseDetailSaleMoney: TFloatField
      DisplayLabel = #38144#21806#37329#39069
      FieldName = 'SaleMoney'
    end
    object BCDField4: TBCDField
      DisplayLabel = #33457#39640
      FieldName = 'FlowerHeight'
      Precision = 18
      Size = 2
    end
    object BCDField5: TBCDField
      DisplayLabel = #33457#23485
      FieldName = 'FlowerWidth'
      Precision = 18
      Size = 2
    end
    object BCDField6: TBCDField
      DisplayLabel = #24133#23485
      FieldName = 'FlowerBreadth'
      Precision = 18
      Size = 2
    end
    object BCDField7: TBCDField
      DisplayLabel = #20811#37325
      FieldName = 'FlowerGram'
      Precision = 18
      Size = 2
    end
    object StringField11: TStringField
      DisplayLabel = #39318#36755#20154
      FieldName = 'Writer'
    end
    object DateTimeField1: TDateTimeField
      DisplayLabel = #39318#36755#26102#38388
      FieldName = 'WriteTime'
    end
    object StringField12: TStringField
      DisplayLabel = #20462#25913#20154
      FieldName = 'Modifier'
    end
    object DateTimeField2: TDateTimeField
      DisplayLabel = #20462#25913#26102#38388
      FieldName = 'ModifyTime'
    end
    object StringField13: TStringField
      DisplayLabel = #22791#27880
      FieldName = 'Remark'
      Size = 500
    end
  end
  object frdsDetail: TfrDBDataSet
    DataSet = adsDetail
    Left = 56
    Top = 160
  end
  object res_Unit: TADODataSet
    Connection = dtmConnect.conMain
    CursorType = ctStatic
    LockType = ltBatchOptimistic
    CommandText = 'Select UnitID, UnitCode, UnitName from V_da_Unit'
    Parameters = <>
    Left = 464
    Top = 104
  end
end
